/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / graphics / mturtle / !Mturtle / MTURTLE

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 08 eb 20 31 32 | 0d 00 14 07 fb 20 32 0d |..... 12|..... 2.|
|00000010| 00 1e 1c 2a 54 59 50 45 | 20 3c 6f 62 65 79 24 64 |...*TYPE| <obey$d|
|00000020| 69 72 3e 2e 48 45 41 44 | 49 4e 47 0d 00 28 19 49 |ir>.HEAD|ING..(.I|
|00000030| 24 3d be 3a e7 20 49 24 | 3d 22 48 22 20 8c 20 f2 |$=.:. I$|="H" . .|
|00000040| 48 45 4c 50 0d 00 32 55 | de 20 4c 28 31 30 30 30 |HELP..2U|. L(1000|
|00000050| 2c 34 29 2c 53 54 41 43 | 4b 24 28 32 30 29 2c 50 |,4),STAC|K$(20),P|
|00000060| 4f 43 24 28 31 30 2c 31 | 30 29 3a 54 58 3d 36 30 |OC$(10,1|0):TX=60|
|00000070| 30 3a 54 59 3d 33 35 30 | 3a 54 44 3d 30 3a 43 4f |0:TY=350|:TD=0:CO|
|00000080| 4c 3d 37 3a 44 52 3d 35 | 3a 4c 45 3d 31 3a 53 3d |L=7:DR=5|:LE=1:S=|
|00000090| 31 3a 44 3d 31 3a 50 3d | 30 0d 00 3c 29 4c 28 31 |1:D=1:P=|0..<)L(1|
|000000a0| 2c 31 29 3d 54 58 3a 4c | 28 31 2c 32 29 3d 54 59 |,1)=TX:L|(1,2)=TY|
|000000b0| 3a 4c 28 31 2c 33 29 3d | 30 3a 4c 28 31 2c 34 29 |:L(1,3)=|0:L(1,4)|
|000000c0| 3d 34 0d 00 46 08 eb 20 | 31 32 0d 00 50 1e 2a 50 |=4..F.. |12..P.*P|
|000000d0| 52 49 4e 54 20 3c 6f 62 | 65 79 24 64 69 72 3e 2e |RINT <ob|ey$dir>.|
|000000e0| 21 50 41 4c 45 54 54 45 | 0d 00 5a 19 ef 20 32 34 |!PALETTE|..Z.. 24|
|000000f0| 2c 30 3b 33 30 30 3b 31 | 32 37 38 3b 31 30 32 33 |,0;300;1|278;1023|
|00000100| 3b 0d 00 64 13 ef 20 32 | 38 2c 30 2c 33 31 2c 37 |;..d.. 2|8,0,31,7|
|00000110| 39 2c 32 34 0d 00 6e 0f | ef 20 32 39 2c 30 3b 33 |9,24..n.|. 29,0;3|
|00000120| 30 30 3b 0d 00 78 05 da | 0d 00 82 0e fb 20 31 32 |00;..x..|..... 12|
|00000130| 38 2b 31 32 3a db 0d 00 | 8c 09 f2 42 41 53 45 0d |8+12:...|...BASE.|
|00000140| 00 96 04 0d 00 a0 0a dd | f2 42 41 53 45 0d 00 aa |........|.BASE...|
|00000150| 30 ee 20 85 20 fb 20 31 | 31 3a ef 20 20 37 3a f1 |0. . . 1|1:.  7:.|
|00000160| 20 22 49 20 63 61 6e 27 | 74 20 64 6f 20 74 68 61 | "I can'|t do tha|
|00000170| 74 21 22 3a fb 20 37 3a | f2 42 41 53 45 0d 00 b4 |t!":. 7:|.BASE...|
|00000180| 20 f1 20 22 54 75 72 74 | 6c 65 20 52 65 61 64 79 | . "Turt|le Ready|
|00000190| 20 41 6e 64 20 57 61 69 | 74 69 6e 67 22 0d 00 be | And Wai|ting"...|
|000001a0| 05 f5 0d 00 c8 0b f2 52 | 45 44 52 41 57 0d 00 d2 |.......R|EDRAW...|
|000001b0| 08 e8 20 49 24 0d 00 dc | 07 f2 44 4f 0d 00 e6 07 |.. I$...|..DO....|
|000001c0| fd 20 a3 0d 00 f0 0b f2 | 52 45 44 52 41 57 0d 00 |. ......|REDRAW..|
|000001d0| fa 05 e1 0d 01 04 04 0d | 01 0e 0c dd f2 52 45 44 |........|.....RED|
|000001e0| 52 41 57 0d 01 18 0f da | 3a 42 58 3d 30 3a 42 59 |RAW.....|:BX=0:BY|
|000001f0| 3d 30 0d 01 22 0c e7 20 | 4c 45 3e 30 20 8c 0d 01 |=0..".. |LE>0 ...|
|00000200| 2c 1e e7 20 54 58 3e 3d | 31 32 30 30 2f 53 20 84 |,.. TX>=|1200/S .|
|00000210| 20 54 59 3e 3d 37 30 30 | 2f 53 20 8c 0d 01 36 1e | TY>=700|/S ...6.|
|00000220| f5 3a 42 58 3d 42 58 2b | 31 30 3a fd 20 54 58 2d |.:BX=BX+|10:. TX-|
|00000230| 42 58 3c 3d 31 32 30 30 | 2f 53 0d 01 40 1d f5 3a |BX<=1200|/S..@..:|
|00000240| 42 59 3d 42 59 2b 31 30 | 3a fd 20 54 59 2d 42 59 |BY=BY+10|:. TY-BY|
|00000250| 3c 3d 37 30 30 2f 53 0d | 01 4a 05 cd 0d 01 54 21 |<=700/S.|.J....T!|
|00000260| ec 20 28 4c 28 31 2c 31 | 29 2a 53 29 2d 42 58 2c |. (L(1,1|)*S)-BX,|
|00000270| 28 4c 28 31 2c 32 29 2a | 53 29 2d 42 59 0d 01 5e |(L(1,2)*|S)-BY..^|
|00000280| 0e e3 20 4e 3d 31 20 b8 | 20 4c 45 0d 01 68 0e e6 |.. N=1 .| LE..h..|
|00000290| 20 30 2c 4c 28 4e 2c 33 | 29 0d 01 72 28 f0 20 4c | 0,L(N,3|)..r(. L|
|000002a0| 28 4e 2c 34 29 2c 28 4c | 28 4e 2c 31 29 2a 53 29 |(N,4),(L|(N,1)*S)|
|000002b0| 2d 42 58 2c 28 4c 28 4e | 2c 32 29 2a 53 29 2d 42 |-BX,(L(N|,2)*S)-B|
|000002c0| 59 0d 01 7c 07 ed 20 4e | 0d 01 86 20 f2 54 55 52 |Y..|.. N|... .TUR|
|000002d0| 54 4c 45 28 28 54 58 2a | 53 29 2d 42 58 2c 28 54 |TLE((TX*|S)-BX,(T|
|000002e0| 59 2a 53 29 2d 42 59 29 | 0d 01 90 05 e1 0d 01 9a |Y*S)-BY)|........|
|000002f0| 04 0d 01 a4 11 dd f2 54 | 55 52 54 4c 45 28 41 2c |.......T|URTLE(A,|
|00000300| 42 29 0d 01 ae 0a e6 20 | 30 2c 31 33 0d 01 b8 10 |B)..... |0,13....|
|00000310| c8 8f 20 c8 90 20 41 2c | 42 2c 34 30 0d 01 c2 0a |.. .. A,|B,40....|
|00000320| e6 20 30 2c 31 30 0d 01 | cc 0d c8 8f 20 41 2c 42 |. 0,10..|.... A,B|
|00000330| 2c 31 35 0d 01 d6 0c c8 | 8f 20 41 2c 42 2c 35 0d |,15.....|. A,B,5.|
|00000340| 01 e0 0d c8 8f 20 41 2c | 42 2c 32 35 0d 01 ea 2c |..... A,|B,25...,|
|00000350| c8 8f 20 c8 90 20 41 2b | 28 b5 28 b2 28 54 44 29 |.. .. A+|(.(.(TD)|
|00000360| 29 2a 34 35 29 2c 42 2b | 28 9b 28 b2 28 54 44 29 |)*45),B+|(.(.(TD)|
|00000370| 29 2a 34 35 29 2c 32 30 | 0d 01 f4 32 c8 8f 20 c8 |)*45),20|...2.. .|
|00000380| 90 20 41 2b 28 b5 28 b2 | 28 54 44 2b 34 35 29 29 |. A+(.(.|(TD+45))|
|00000390| 2a 34 35 29 2c 42 2b 28 | 9b 28 b2 28 54 44 2b 34 |*45),B+(|.(.(TD+4|
|000003a0| 35 29 29 2a 34 35 29 2c | 31 30 0d 01 fe 34 c8 8f |5))*45),|10...4..|
|000003b0| 20 c8 90 20 41 2b 28 b5 | 28 b2 28 54 44 2b 31 33 | .. A+(.|(.(TD+13|
|000003c0| 35 29 29 2a 34 35 29 2c | 42 2b 28 9b 28 b2 28 54 |5))*45),|B+(.(.(T|
|000003d0| 44 2b 31 33 35 29 29 2a | 34 35 29 2c 31 30 0d 02 |D+135))*|45),10..|
|000003e0| 08 34 c8 8f 20 c8 90 20 | 41 2b 28 b5 28 b2 28 54 |.4.. .. |A+(.(.(T|
|000003f0| 44 2b 32 32 35 29 29 2a | 34 35 29 2c 42 2b 28 9b |D+225))*|45),B+(.|
|00000400| 28 b2 28 54 44 2b 32 32 | 35 29 29 2a 34 35 29 2c |(.(TD+22|5))*45),|
|00000410| 31 30 0d 02 12 34 c8 8f | 20 c8 90 20 41 2b 28 b5 |10...4..| .. A+(.|
|00000420| 28 b2 28 54 44 2b 33 31 | 35 29 29 2a 34 35 29 2c |(.(TD+31|5))*45),|
|00000430| 42 2b 28 9b 28 b2 28 54 | 44 2b 33 31 35 29 29 2a |B+(.(.(T|D+315))*|
|00000440| 34 35 29 2c 31 30 0d 02 | 1c 05 e1 0d 02 26 04 0d |45),10..|.....&..|
|00000450| 02 30 08 dd f2 44 4f 0d | 02 3a 0a 44 4f 4e 45 3d |.0...DO.|.:.DONE=|
|00000460| 30 0d 02 44 1a e7 20 c0 | 49 24 2c 31 29 3d 22 2a |0..D.. .|I$,1)="*|
|00000470| 22 20 8c 20 ff 28 49 24 | 29 3a e1 0d 02 4e 10 49 |" . .(I$|):...N.I|
|00000480| 24 3d a4 43 41 50 53 28 | 49 24 29 0d 02 58 0b e7 |$=.CAPS(|I$)..X..|
|00000490| 20 50 3e 30 20 8c 0d 02 | 62 0e e3 20 4e 4f 3d 31 | P>0 ...|b.. NO=1|
|000004a0| 20 b8 20 50 0d 02 6c 1f | e7 20 49 24 3d 50 4f 43 | . P..l.|. I$=POC|
|000004b0| 24 28 4e 4f 2c 30 29 20 | 8c 20 f2 44 4f 44 45 28 |$(NO,0) |. .DODE(|
|000004c0| 4e 4f 29 0d 02 76 08 ed | 20 4e 4f 0d 02 80 05 cd |NO)..v..| NO.....|
|000004d0| 0d 02 8a 13 49 49 24 3d | a4 46 49 52 53 54 57 28 |....II$=|.FIRSTW(|
|000004e0| 49 24 29 0d 02 94 2b e7 | 20 49 49 24 3d 22 46 44 |I$)...+.| II$="FD|
|000004f0| 22 20 84 20 49 49 24 3d | 22 46 4f 52 57 41 52 44 |" . II$=|"FORWARD|
|00000500| 22 20 8c 20 f2 46 44 3a | 44 4f 4e 45 3d 31 0d 02 |" . .FD:|DONE=1..|
|00000510| 9e 2d e7 20 49 49 24 3d | 22 4c 54 22 20 84 20 49 |.-. II$=|"LT" . I|
|00000520| 49 24 3d 22 4c 45 46 54 | 22 20 8c 20 54 44 3d 54 |I$="LEFT|" . TD=T|
|00000530| 44 2d 49 51 3a 44 4f 4e | 45 3d 31 0d 02 a8 32 e7 |D-IQ:DON|E=1...2.|
|00000540| 20 49 49 24 3d 22 43 57 | 22 20 84 20 49 49 24 3d | II$="CW|" . II$=|
|00000550| 22 43 4c 4f 43 4b 57 49 | 53 45 22 20 8c 20 54 44 |"CLOCKWI|SE" . TD|
|00000560| 3d 54 44 2b 49 51 3a 44 | 4f 4e 45 3d 31 0d 02 b2 |=TD+IQ:D|ONE=1...|
|00000570| 37 e7 20 49 49 24 3d 22 | 41 43 57 22 20 84 20 49 |7. II$="|ACW" . I|
|00000580| 49 24 3d 22 41 4e 54 49 | 43 4c 4f 43 4b 57 49 53 |I$="ANTI|CLOCKWIS|
|00000590| 45 22 20 8c 20 54 44 3d | 54 44 2d 49 51 3a 44 4f |E" . TD=|TD-IQ:DO|
|000005a0| 4e 45 3d 31 0d 02 bc 2e | e7 20 49 49 24 3d 22 52 |NE=1....|. II$="R|
|000005b0| 54 22 20 84 20 49 49 24 | 3d 22 52 49 47 48 54 22 |T" . II$|="RIGHT"|
|000005c0| 20 8c 20 54 44 3d 54 44 | 2b 49 51 3a 44 4f 4e 45 | . TD=TD|+IQ:DONE|
|000005d0| 3d 31 0d 02 c6 2a e7 20 | 49 49 24 3d 22 50 55 22 |=1...*. |II$="PU"|
|000005e0| 20 84 20 49 49 24 3d 22 | 50 45 4e 55 50 22 20 8c | . II$="|PENUP" .|
|000005f0| 20 44 52 3d 34 3a 44 4f | 4e 45 3d 31 0d 02 d0 2c | DR=4:DO|NE=1...,|
|00000600| e7 20 49 49 24 3d 22 50 | 44 22 20 84 20 49 49 24 |. II$="P|D" . II$|
|00000610| 3d 22 50 45 4e 44 4f 57 | 4e 22 20 8c 20 44 52 3d |="PENDOW|N" . DR=|
|00000620| 35 3a 44 4f 4e 45 3d 31 | 0d 02 da 30 e7 20 49 49 |5:DONE=1|...0. II|
|00000630| 24 3d 22 50 43 22 20 84 | 20 49 49 24 3d 22 50 45 |$="PC" .| II$="PE|
|00000640| 4e 43 4f 4c 4f 55 52 22 | 20 8c 20 43 4f 4c 3d 49 |NCOLOUR"| . COL=I|
|00000650| 51 3a 44 4f 4e 45 3d 31 | 0d 02 e4 28 e7 20 49 49 |Q:DONE=1|...(. II|
|00000660| 24 3d 22 51 55 49 54 22 | 20 8c 20 ff 28 22 44 45 |$="QUIT"| . .("DE|
|00000670| 53 4b 54 4f 50 22 29 3a | e0 3a 44 4f 4e 45 3d 31 |SKTOP"):|.:DONE=1|
|00000680| 0d 02 ee 1f e7 20 49 49 | 24 3d 22 52 45 50 45 41 |..... II|$="REPEA|
|00000690| 54 22 20 8c 20 f2 52 45 | 3a 44 4f 4e 45 3d 31 0d |T" . .RE|:DONE=1.|
|000006a0| 02 f8 1c e7 20 49 49 24 | 3d 22 44 45 46 22 20 8c |.... II$|="DEF" .|
|000006b0| 20 f2 44 45 3a 44 4f 4e | 45 3d 31 0d 03 02 1f e7 | .DE:DON|E=1.....|
|000006c0| 20 49 49 24 3d 22 50 4c | 4f 54 22 20 8c 20 44 52 | II$="PL|OT" . DR|
|000006d0| 3d 49 51 3a 44 4f 4e 45 | 3d 31 0d 03 0c 1f e7 20 |=IQ:DONE|=1..... |
|000006e0| 49 49 24 3d 22 53 43 41 | 4c 45 22 20 8c 20 53 3d |II$="SCA|LE" . S=|
|000006f0| 49 51 3a 44 4f 4e 45 3d | 31 0d 03 16 2e e7 20 49 |IQ:DONE=|1..... I|
|00000700| 49 24 3d 22 46 49 4c 4c | 22 20 8c 20 44 52 3d 31 |I$="FILL|" . DR=1|
|00000710| 33 33 3a 49 51 3d 30 3a | f2 46 44 3a 44 52 3d 35 |33:IQ=0:|.FD:DR=5|
|00000720| 3a 44 4f 4e 45 3d 31 0d | 03 20 5b e7 20 49 49 24 |:DONE=1.|. [. II$|
|00000730| 3d 22 43 45 4e 54 45 52 | 22 20 8c 20 4c 28 4c 45 |="CENTER|" . L(LE|
|00000740| 2c 31 29 3d 36 30 30 3a | 4c 28 4c 45 2c 32 29 3d |,1)=600:|L(LE,2)=|
|00000750| 33 35 30 3a 4c 28 4c 45 | 2c 33 29 3d 30 30 3a 4c |350:L(LE|,3)=00:L|
|00000760| 28 4c 45 2c 34 29 3d 34 | 3a 54 58 3d 36 30 30 3a |(LE,4)=4|:TX=600:|
|00000770| 54 59 3d 33 30 30 3a 54 | 44 3d 30 3a 44 4f 4e 45 |TY=300:T|D=0:DONE|
|00000780| 3d 31 0d 03 2a 2f e7 20 | 49 49 24 3d 22 43 53 22 |=1..*/. |II$="CS"|
|00000790| 20 84 20 49 49 24 3d 22 | 43 4c 45 41 52 53 43 52 | . II$="|CLEARSCR|
|000007a0| 45 45 4e 22 20 8c 20 f2 | 43 53 3a 44 4f 4e 45 3d |EEN" . .|CS:DONE=|
|000007b0| 31 0d 03 34 1d e7 20 49 | 49 24 3d 22 5a 4f 4f 4d |1..4.. I|I$="ZOOM|
|000007c0| 22 20 8c 20 f2 5a 4f 3a | 44 4f 4e 45 3d 31 0d 03 |" . .ZO:|DONE=1..|
|000007d0| 3e 1f e7 20 49 49 24 3d | 22 48 45 4c 50 22 20 8c |>.. II$=|"HELP" .|
|000007e0| 20 f2 48 45 4c 50 3a 44 | 4f 4e 45 3d 31 0d 03 48 | .HELP:D|ONE=1..H|
|000007f0| 1f e7 20 49 49 24 3d 22 | 53 41 56 45 22 20 8c 20 |.. II$="|SAVE" . |
|00000800| f2 53 41 56 45 3a 44 4f | 4e 45 3d 31 0d 03 52 1f |.SAVE:DO|NE=1..R.|
|00000810| e7 20 49 49 24 3d 22 4c | 4f 41 44 22 20 8c 20 f2 |. II$="L|OAD" . .|
|00000820| 4c 4f 41 44 3a 44 4f 4e | 45 3d 31 0d 03 5c 2b e7 |LOAD:DON|E=1..\+.|
|00000830| 20 49 24 3d 22 4e 45 58 | 54 22 20 84 20 49 24 3d | I$="NEX|T" . I$=|
|00000840| 22 45 4e 44 22 20 84 20 | 49 24 3d 22 22 20 8c 20 |"END" . |I$="" . |
|00000850| 44 4f 4e 45 3d 31 0d 03 | 66 37 e7 20 44 4f 4e 45 |DONE=1..|f7. DONE|
|00000860| 3d 30 20 8c 20 ef 20 37 | 3a f1 20 22 49 20 63 61 |=0 . . 7|:. "I ca|
|00000870| 6e 27 74 20 64 6f 20 22 | 3b 49 24 3b 22 20 61 74 |n't do "|;I$;" at|
|00000880| 20 74 68 65 20 6d 6f 6d | 65 6e 74 2e 22 0d 03 70 | the mom|ent."..p|
|00000890| 05 e1 0d 03 7a 04 0d 03 | 84 0e dd a4 43 41 50 53 |....z...|....CAPS|
|000008a0| 28 4e 24 29 0d 03 8e 0a | 4e 4e 24 3d 22 22 0d 03 |(N$)....|NN$=""..|
|000008b0| 98 11 e3 20 4e 3d 31 20 | b8 20 a9 28 4e 24 29 0d |... N=1 |. .(N$).|
|000008c0| 03 a2 55 e7 20 97 28 c1 | 4e 24 2c 4e 2c 31 29 29 |..U. .(.|N$,N,1))|
|000008d0| 3e 39 36 20 80 20 97 28 | c1 4e 24 2c 4e 2c 31 29 |>96 . .(|.N$,N,1)|
|000008e0| 29 3c 31 32 34 20 8c 20 | 4e 4e 24 3d 4e 4e 24 2b |)<124 . |NN$=NN$+|
|000008f0| bd 28 97 28 c1 4e 24 2c | 4e 2c 31 29 29 2d 33 32 |.(.(.N$,|N,1))-32|
|00000900| 29 20 8b 20 4e 4e 24 3d | 4e 4e 24 2b c1 4e 24 2c |) . NN$=|NN$+.N$,|
|00000910| 4e 2c 31 29 0d 03 ac 07 | ed 20 4e 0d 03 b6 08 3d |N,1)....|. N....=|
|00000920| 4e 4e 24 0d 03 c0 04 0d | 03 ca 10 dd a4 46 49 52 |NN$.....|.....FIR|
|00000930| 53 54 57 28 4e 24 29 0d | 03 d4 07 4e 3d 30 0d 03 |STW(N$).|...N=0..|
|00000940| de 25 f5 3a 4e 3d 4e 2b | 31 3a fd 20 c1 4e 24 2c |.%.:N=N+|1:. .N$,|
|00000950| 4e 2c 31 29 3d 22 20 22 | 20 84 20 4e 3e 3d a9 28 |N,1)=" "| . N>=.(|
|00000960| 4e 24 29 0d 03 e8 16 e7 | 20 4e 3e 3d a9 28 4e 24 |N$).....| N>=.(N$|
|00000970| 29 20 8c 20 4e 3d 4e 2b | 31 0d 03 f2 16 4e 4e 3d |) . N=N+|1....NN=|
|00000980| 4e 3a 4e 4e 4e 24 3d c0 | 4e 24 2c 4e 2d 31 29 0d |N:NNN$=.|N$,N-1).|
|00000990| 03 fc 0f e7 20 4e 3c a9 | 28 4e 24 29 20 8c 0d 04 |.... N<.|(N$) ...|
|000009a0| 06 1a e7 20 4e 3d a9 28 | 4e 24 29 20 8c 20 49 51 |... N=.(|N$) . IQ|
|000009b0| 3d 30 3a 3d 4e 4e 4e 24 | 0d 04 10 24 f5 3a 4e 3d |=0:=NNN$|...$.:N=|
|000009c0| 4e 2b 31 3a fd 20 c1 4e | 24 2c 4e 2c 31 29 3d 22 |N+1:. .N|$,N,1)="|
|000009d0| 3a 22 20 84 20 4e 3d a9 | 28 4e 24 29 0d 04 1a 15 |:" . N=.|(N$)....|
|000009e0| e7 20 4e 3d a9 28 4e 24 | 29 20 8c 20 4e 3d 4e 2b |. N=.(N$|) . N=N+|
|000009f0| 31 0d 04 24 39 e7 20 4e | 4e 4e 24 3d 22 44 45 46 |1..$9. N|NN$="DEF|
|00000a00| 22 20 84 20 4e 4e 4e 24 | 3d 22 53 41 56 45 22 20 |" . NNN$|="SAVE" |
|00000a10| 84 20 4e 4e 4e 24 3d 22 | 4c 4f 41 44 22 20 8c 20 |. NNN$="|LOAD" . |
|00000a20| 49 51 3d 30 3a 3d 4e 4e | 4e 24 0d 04 2e 48 e7 20 |IQ=0:=NN|N$...H. |
|00000a30| bb 28 c3 28 a0 28 c1 4e | 24 2c 4e 4e 2c 4e 2d 4e |.(.(.(.N|$,NN,N-N|
|00000a40| 4e 29 29 29 29 3d a0 28 | c1 4e 24 2c 4e 4e 2c 4e |N))))=.(|.N$,NN,N|
|00000a50| 2d 4e 4e 29 29 20 20 8c | 20 49 51 3d a0 28 c1 4e |-NN))  .| IQ=.(.N|
|00000a60| 24 2c 4e 4e 2c 4e 2d 4e | 4e 29 29 20 8b 20 49 51 |$,NN,N-N|N)) . IQ|
|00000a70| 3d 30 0d 04 38 09 3d 4e | 4e 4e 24 0d 04 42 05 cd |=0..8.=N|NN$..B..|
|00000a80| 0d 04 4c 0e 49 51 3d 30 | 3a 3d 4e 4e 4e 24 0d 04 |..L.IQ=0|:=NNN$..|
|00000a90| 56 04 0d 04 60 08 dd f2 | 46 44 0d 04 6a 0d e9 20 |V...`...|FD..j.. |
|00000aa0| 4c 45 3d 4c 45 2b 31 0d | 04 74 15 54 58 3d 54 58 |LE=LE+1.|.t.TX=TX|
|00000ab0| 2b b5 28 b2 28 54 44 29 | 29 2a 49 51 0d 04 7e 15 |+.(.(TD)|)*IQ..~.|
|00000ac0| 54 59 3d 54 59 2b 9b 28 | b2 28 54 44 29 29 2a 49 |TY=TY+.(|.(TD))*I|
|00000ad0| 51 0d 04 88 0e 4c 28 4c | 45 2c 31 29 3d 54 58 0d |Q....L(L|E,1)=TX.|
|00000ae0| 04 92 0e 4c 28 4c 45 2c | 32 29 3d 54 59 0d 04 9c |...L(LE,|2)=TY...|
|00000af0| 0f 4c 28 4c 45 2c 33 29 | 3d 43 4f 4c 0d 04 a6 0e |.L(LE,3)|=COL....|
|00000b00| 4c 28 4c 45 2c 34 29 3d | 44 52 0d 04 b0 05 e1 0d |L(LE,4)=|DR......|
|00000b10| 04 ba 04 0d 04 c4 08 dd | f2 52 45 0d 04 ce 07 4e |........|.RE....N|
|00000b20| 3d 30 0d 04 d8 05 f5 0d | 04 e2 09 4e 3d 4e 2b 31 |=0......|...N=N+1|
|00000b30| 0d 04 ec 0f e8 20 53 54 | 41 43 4b 24 28 4e 29 0d |..... ST|ACK$(N).|
|00000b40| 04 f6 30 fd 20 4e 3d 31 | 30 20 84 20 53 54 41 43 |..0. N=1|0 . STAC|
|00000b50| 4b 24 28 4e 29 3d 22 4e | 45 58 54 22 20 84 20 53 |K$(N)="N|EXT" . S|
|00000b60| 54 41 43 4b 24 28 4e 29 | 3d 22 6e 65 78 74 22 0d |TACK$(N)|="next".|
|00000b70| 05 00 16 e7 20 4e 3d 31 | 30 20 8c 20 f1 20 22 3f |.... N=1|0 . . "?|
|00000b80| 4e 45 58 54 22 0d 05 0a | 0a f2 52 50 28 4e 29 0d |NEXT"...|..RP(N).|
|00000b90| 05 14 05 e1 0d 05 1e 04 | 0d 05 28 0c dd f2 52 50 |........|..(...RP|
|00000ba0| 28 4d 4d 29 0d 05 32 0e | e3 20 4f 3d 31 20 b8 20 |(MM)..2.|. O=1 . |
|00000bb0| 49 51 0d 05 3c 10 e3 20 | 4d 4d 4d 3d 31 20 b8 20 |IQ..<.. |MMM=1 . |
|00000bc0| 4d 4d 0d 05 46 16 49 24 | 3d 53 54 41 43 4b 24 28 |MM..F.I$|=STACK$(|
|00000bd0| 4d 4d 4d 29 3a f2 44 4f | 0d 05 50 0b f2 52 45 44 |MMM):.DO|..P..RED|
|00000be0| 52 41 57 0d 05 5a 09 ed | 20 4d 4d 4d 0d 05 64 07 |RAW..Z..| MMM..d.|
|00000bf0| ed 20 4f 0d 05 6e 05 e1 | 0d 05 78 04 0d 05 82 08 |. O..n..|..x.....|
|00000c00| dd f2 44 45 0d 05 8c 09 | 50 3d 50 2b 31 0d 05 96 |..DE....|P=P+1...|
|00000c10| 2c 50 4f 43 24 28 50 2c | 30 29 3d c1 49 24 2c a9 |,POC$(P,|0)=.I$,.|
|00000c20| 28 49 49 24 29 2b 32 2c | a9 28 49 24 29 2d 28 a9 |(II$)+2,|.(I$)-(.|
|00000c30| 28 49 49 24 29 2b 31 29 | 29 0d 05 a0 08 4e 49 3d |(II$)+1)|)....NI=|
|00000c40| 30 0d 05 aa 05 f5 0d 05 | b4 0b 4e 49 3d 4e 49 2b |0.......|..NI=NI+|
|00000c50| 31 0d 05 be 10 e8 20 50 | 4f 43 24 28 50 2c 4e 49 |1..... P|OC$(P,NI|
|00000c60| 29 0d 05 c8 25 fd 20 4e | 49 3d 31 30 20 84 20 a4 |)...%. N|I=10 . .|
|00000c70| 43 41 50 53 28 50 4f 43 | 24 28 50 2c 4e 49 29 29 |CAPS(POC|$(P,NI))|
|00000c80| 3d 22 45 4e 44 22 0d 05 | d2 16 e7 20 4e 49 3d 31 |="END"..|... NI=1|
|00000c90| 30 20 8c 20 f1 20 22 3f | 45 4e 44 22 0d 05 dc 05 |0 . . "?|END"....|
|00000ca0| e1 0d 05 e6 04 0d 05 f0 | 0e dd f2 44 4f 44 45 28 |........|...DODE(|
|00000cb0| 4d 4e 29 0d 05 fa 0c 44 | 3d 30 3a 52 50 3d 30 0d |MN)....D|=0:RP=0.|
|00000cc0| 06 04 0e e3 20 41 3d 31 | 20 b8 20 31 30 0d 06 0e |.... A=1| . 10...|
|00000cd0| 26 e7 20 a4 43 41 50 53 | 28 c0 50 4f 43 24 28 4d |&. .CAPS|(.POC$(M|
|00000ce0| 4e 2c 41 29 2c 36 29 29 | 3d 22 52 45 50 45 41 54 |N,A),6))|="REPEAT|
|00000cf0| 22 20 8c 0d 06 18 20 49 | 51 3d bb 28 c1 50 4f 43 |" .... I|Q=.(.POC|
|00000d00| 24 28 4d 4e 2c 41 29 2c | 38 2c a9 28 49 24 29 2d |$(MN,A),|8,.(I$)-|
|00000d10| 38 29 29 0d 06 22 14 44 | 3d 31 3a 41 4f 41 3d 41 |8))..".D|=1:AOA=A|
|00000d20| 2b 31 3a 52 50 3d 31 0d | 06 2c 05 cd 0d 06 36 1d |+1:RP=1.|.,....6.|
|00000d30| e7 20 44 3d 30 20 8c 20 | 49 24 3d 50 4f 43 24 28 |. D=0 . |I$=POC$(|
|00000d40| 4d 4e 2c 41 29 3a f2 44 | 4f 0d 06 40 2e e7 20 a4 |MN,A):.D|O..@.. .|
|00000d50| 43 41 50 53 28 c0 50 4f | 43 24 28 4d 4e 2c 41 29 |CAPS(.PO|C$(MN,A)|
|00000d60| 2c 34 29 29 3d 22 4e 45 | 58 54 22 20 8c 20 f2 42 |,4))="NE|XT" . .B|
|00000d70| 4c 41 4e 3a 44 3d 30 0d | 06 4a 11 e7 20 44 3e 30 |LAN:D=0.|.J.. D>0|
|00000d80| 20 8c 20 44 3d 44 2b 31 | 0d 06 54 07 ed 20 41 0d | . D=D+1|..T.. A.|
|00000d90| 06 5e 05 e1 0d 06 68 04 | 0d 06 72 0a dd f2 42 4c |.^....h.|..r...BL|
|00000da0| 41 4e 0d 06 7c 0f e3 20 | 43 4f 3d 31 20 b8 20 49 |AN..|.. |CO=1 . I|
|00000db0| 51 0d 06 86 14 e3 20 4e | 56 3d 41 4f 41 20 b8 20 |Q..... N|V=AOA . |
|00000dc0| 41 4f 41 2b 44 0d 06 90 | 16 49 24 3d 50 4f 43 24 |AOA+D...|.I$=POC$|
|00000dd0| 28 4d 4e 2c 4e 56 29 3a | f2 44 4f 0d 06 9a 08 ed |(MN,NV):|.DO.....|
|00000de0| 20 4e 56 0d 06 a4 08 ed | 20 43 4f 0d 06 ae 05 e1 | NV.....| CO.....|
|00000df0| 0d 06 b8 04 0d 06 c2 08 | dd f2 43 53 0d 06 cc 0e |........|..CS....|
|00000e00| e3 20 4e 3d 31 20 b8 20 | 4c 45 0d 06 d6 0e e3 20 |. N=1 . |LE..... |
|00000e10| 4e 4e 3d 31 20 b8 20 34 | 0d 06 e0 0d 4c 28 4e 2c |NN=1 . 4|....L(N,|
|00000e20| 4e 4e 29 3d 30 0d 06 ea | 08 ed 20 4e 4e 0d 06 f4 |NN)=0...|.. NN...|
|00000e30| 07 ed 20 4e 0d 06 fe 08 | 4c 45 3d 31 0d 07 08 29 |.. N....|LE=1...)|
|00000e40| 4c 28 31 2c 31 29 3d 54 | 58 3a 4c 28 31 2c 32 29 |L(1,1)=T|X:L(1,2)|
|00000e50| 3d 54 59 3a 4c 28 31 2c | 33 29 3d 30 3a 4c 28 31 |=TY:L(1,|3)=0:L(1|
|00000e60| 2c 34 29 3d 34 0d 07 12 | 05 e1 0d 07 1c 04 0d 07 |,4)=4...|........|
|00000e70| 26 08 dd f2 5a 4f 0d 07 | 30 09 48 45 58 3d 30 0d |&...ZO..|0.HEX=0.|
|00000e80| 07 3a 09 48 45 59 3d 30 | 0d 07 44 0e e3 20 4e 3d |.:.HEY=0|..D.. N=|
|00000e90| 31 20 b8 20 4c 45 0d 07 | 4e 1d e7 20 4c 28 4e 2c |1 . LE..|N.. L(N,|
|00000ea0| 31 29 3e 48 45 58 20 8c | 20 48 45 58 3d 4c 28 4e |1)>HEX .| HEX=L(N|
|00000eb0| 2c 31 29 0d 07 58 1d e7 | 20 4c 28 4e 2c 32 29 3e |,1)..X..| L(N,2)>|
|00000ec0| 48 45 59 20 8c 20 48 45 | 59 3d 4c 28 4e 2c 32 29 |HEY . HE|Y=L(N,2)|
|00000ed0| 0d 07 62 07 ed 20 4e 0d | 07 6c 2f e7 20 48 45 58 |..b.. N.|.l/. HEX|
|00000ee0| 2f 31 32 30 30 3e 48 45 | 59 2f 37 30 30 20 8c 20 |/1200>HE|Y/700 . |
|00000ef0| 53 3d 31 31 35 30 2f 48 | 45 58 20 8b 20 53 3d 36 |S=1150/H|EX . S=6|
|00000f00| 35 30 2f 48 45 59 0d 07 | 76 05 e1 0d 07 80 04 0d |50/HEY..|v.......|
|00000f10| 07 8a 0a dd f2 48 45 4c | 50 0d 07 94 08 eb 20 31 |.....HEL|P..... 1|
|00000f20| 32 0d 07 9e 08 ef 20 31 | 34 0d 07 a8 07 fb 20 31 |2..... 1|4..... 1|
|00000f30| 0d 07 b2 19 2a 54 59 50 | 45 20 3c 6f 62 65 79 24 |....*TYP|E <obey$|
|00000f40| 64 69 72 3e 2e 48 45 4c | 50 0d 07 bc 07 49 3d a5 |dir>.HEL|P....I=.|
|00000f50| 0d 07 c6 08 eb 20 31 32 | 0d 07 d0 08 ef 20 31 35 |..... 12|..... 15|
|00000f60| 0d 07 da 1e 2a 50 52 49 | 4e 54 20 3c 6f 62 65 79 |....*PRI|NT <obey|
|00000f70| 24 64 69 72 3e 2e 21 50 | 41 4c 45 54 54 45 0d 07 |$dir>.!P|ALETTE..|
|00000f80| e4 19 ef 20 32 34 2c 30 | 3b 33 30 30 3b 31 32 37 |... 24,0|;300;127|
|00000f90| 38 3b 31 30 32 33 3b 0d | 07 ee 13 ef 20 32 38 2c |8;1023;.|.... 28,|
|00000fa0| 30 2c 33 31 2c 37 39 2c | 32 34 0d 07 f8 0f ef 20 |0,31,79,|24..... |
|00000fb0| 32 39 2c 30 3b 33 30 30 | 3b 0d 08 02 05 da 0d 08 |29,0;300|;.......|
|00000fc0| 0c 0e fb 20 31 32 38 2b | 31 32 3a db 0d 08 16 05 |... 128+|12:.....|
|00000fd0| e1 0d 08 20 04 0d 08 2a | 0a dd f2 53 41 56 45 0d |... ...*|...SAVE.|
|00000fe0| 08 34 17 58 3d ae 28 c1 | 49 24 2c 35 2c a9 28 49 |.4.X=.(.|I$,5,.(I|
|00000ff0| 24 29 2d 34 29 29 0d 08 | 3e 11 f1 23 58 2c 22 4d |$)-4))..|>..#X,"M|
|00001000| 54 55 52 54 4c 45 22 0d | 08 48 1a f1 23 58 2c 4c |TURTLE".|.H..#X,L|
|00001010| 45 2c 54 58 2c 54 59 2c | 54 44 2c 43 4f 4c 2c 44 |E,TX,TY,|TD,COL,D|
|00001020| 52 0d 08 52 0e e3 20 41 | 3d 31 20 b8 20 4c 45 0d |R..R.. A|=1 . LE.|
|00001030| 08 5c 0e f1 23 58 2c 4c | 28 41 2c 31 29 0d 08 66 |.\..#X,L|(A,1)..f|
|00001040| 0e f1 23 58 2c 4c 28 41 | 2c 32 29 0d 08 70 0e f1 |..#X,L(A|,2)..p..|
|00001050| 23 58 2c 4c 28 41 2c 33 | 29 0d 08 7a 0e f1 23 58 |#X,L(A,3|)..z..#X|
|00001060| 2c 4c 28 41 2c 34 29 0d | 08 84 07 ed 20 41 0d 08 |,L(A,4).|.... A..|
|00001070| 8e 0e e3 20 41 3d 30 20 | b8 20 31 30 0d 08 98 0e |... A=0 |. 10....|
|00001080| e3 20 42 3d 30 20 b8 20 | 31 30 0d 08 a2 11 f1 23 |. B=0 . |10.....#|
|00001090| 58 2c 50 4f 43 24 28 41 | 2c 42 29 0d 08 ac 07 ed |X,POC$(A|,B).....|
|000010a0| 20 42 0d 08 b6 07 ed 20 | 41 0d 08 c0 07 d9 23 58 | B..... |A.....#X|
|000010b0| 0d 08 ca 05 e1 0d 08 d4 | 04 0d 08 de 0a dd f2 4c |........|.......L|
|000010c0| 4f 41 44 0d 08 e8 27 ee | 20 85 20 f1 22 2a 2a 49 |OAD...'.| . ."**I|
|000010d0| 4e 56 41 4c 49 44 20 46 | 49 4c 45 2a 2a 22 3a ee |NVALID F|ILE**":.|
|000010e0| 20 85 20 87 3a f2 42 41 | 53 45 0d 08 f2 17 58 3d | . .:.BA|SE....X=|
|000010f0| 8e 28 c1 49 24 2c 35 2c | a9 28 49 24 29 2d 34 29 |.(.I$,5,|.(I$)-4)|
|00001100| 29 0d 08 fc 38 e8 23 58 | 2c 49 24 3a e7 20 49 24 |)...8.#X|,I$:. I$|
|00001110| 3c 3e 22 4d 54 55 52 54 | 4c 45 22 20 8c 20 f1 22 |<>"MTURT|LE" . ."|
|00001120| 2a 2a 49 4e 56 41 4c 49 | 44 20 46 49 4c 45 2a 2a |**INVALI|D FILE**|
|00001130| 22 3a ee 20 85 20 87 3a | e1 0d 09 06 1a e8 23 58 |":. . .:|......#X|
|00001140| 2c 4c 45 2c 54 58 2c 54 | 59 2c 54 44 2c 43 4f 4c |,LE,TX,T|Y,TD,COL|
|00001150| 2c 44 52 0d 09 10 0e e3 | 20 41 3d 31 20 b8 20 4c |,DR.....| A=1 . L|
|00001160| 45 0d 09 1a 0e e8 23 58 | 2c 4c 28 41 2c 31 29 0d |E.....#X|,L(A,1).|
|00001170| 09 24 0e e8 23 58 2c 4c | 28 41 2c 32 29 0d 09 2e |.$..#X,L|(A,2)...|
|00001180| 0e e8 23 58 2c 4c 28 41 | 2c 33 29 0d 09 38 0e e8 |..#X,L(A|,3)..8..|
|00001190| 23 58 2c 4c 28 41 2c 34 | 29 0d 09 42 07 ed 20 41 |#X,L(A,4|)..B.. A|
|000011a0| 0d 09 4c 0e e3 20 41 3d | 30 20 b8 20 31 30 0d 09 |..L.. A=|0 . 10..|
|000011b0| 56 0e e3 20 42 3d 30 20 | b8 20 31 30 0d 09 60 11 |V.. B=0 |. 10..`.|
|000011c0| e8 23 58 2c 50 4f 43 24 | 28 41 2c 42 29 0d 09 6a |.#X,POC$|(A,B)..j|
|000011d0| 07 ed 20 42 0d 09 74 07 | ed 20 41 0d 09 7e 07 d9 |.. B..t.|. A..~..|
|000011e0| 23 58 0d 09 88 09 ee 20 | 85 20 87 0d 09 92 05 e1 |#X..... |. ......|
|000011f0| 0d ff                   |                         |..      |        |
+--------+-------------------------+-------------------------+--------+--------+